home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
fglqbx10.zip
/
12-03.BAS
< prev
next >
Wrap
BASIC Source File
|
1991-06-07
|
330b
|
24 lines
REM $INCLUDE: 'fastgraf.bi'
DEFINT A-Z
IF FGcapslock THEN
PRINT "CapsLock is on."
ELSE
PRINT "CapsLock is off."
END IF
IF FGnumlock THEN
PRINT "NumLock is on."
ELSE
PRINT "NumLock is off."
END IF
IF FGscrlock THEN
PRINT "ScrollLock is on."
ELSE
PRINT "ScrollLock is off."
END IF
END